* startup.el (command-line): Recognize "0" X resource value.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ef07f430b076775b55c34a4c9fc86c5f25680616..0fd659d4aa3eb7647f32e1c9dd9b83574144c5e2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-06-27  Chong Yidong  <cyd@stupidchicken.com>
+
+       * startup.el (command-line): Recognize "0" X resource value.
+
 2010-06-27  Chong Yidong  <cyd@stupidchicken.com>
 
        * startup.el (command-line): Use X resources to set the value of

diff --git a/lisp/startup.el b/lisp/startup.el
index 67ebf47c5dd2715fee412e3c029e27c4aafd3649..e954409497aeb92594ab571ac1d1f4a81741293d 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -889,7 +889,7 @@ opening the first frame (e.g. open a connection to an X server).")
            no-blinking-cursor t))
      ;; Check X resources if available.
      ((memq initial-window-system '(x w32 ns))
-      (let ((no-vals  '("no" "off" "false")))
+      (let ((no-vals  '("no" "off" "false" "0")))
        (if (member (x-get-resource "menuBar" "MenuBar") no-vals)
            (setq menu-bar-mode nil))
        (if (member (x-get-resource "toolBar" "ToolBar") no-vals)